enrich
afs-asm,
afs-stream
with
functions . =>mkfile ( . ) : nat × nat × metadata × nat × buffer-inf → file-heap → bool;
axioms mkfile-stream
: ⊦ ((ino =>mkfile(n, md, m, σ) * F))(files) ↔ (∃ content. ((ino => mkfile(n, md, m, content) * F))(files) ∧ content.stream = σ);
end enrich